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Abstract. The carriers of electric current in a metal are quasiparticles dressed by electron- 
electron interactions, which have a larger effective mass m* and a smaller quasiparticle 
weight z than non-interacting carriers. If the momentum dependence of the self-energy 
can be neglected, the effective mass enhancement and quasiparticle weight of quasipar- 
ticles at the Fermi energy are simply related by z = m/m* (m=bare mass). We propose 
that both superconductivity and ferromagnetism in metals are driven by quasiparticle 
'undressing', i.e., that the correlations between quasiparticles that give rise to the col- 
lective state are associated with an increase in z and a corresponding decrease in m* 
of the carriers. Undressing gives rise to lowering of kinetic energy, which provides the 
condensation energy for the collective state. In contrast, in conventional descriptions of 
superconductivity and ferromagnetism the transitions to these collective states result in 
increase in kinetic energy of the carriers and are driven by lowering of potential energy 
and exchange energy respectively. 



1. Particles and quasiparticles 

Quasiparticles are 'dressed' bare particles, and they have a smaller quasi- 
particle weight and a larger effective mass than bare particles. In several 
superconductors and ferromagnets of current interest there is experimental 
evidence hat quasiparticles 'undress', and resemble more free particles, 
when correlations build up and the system orders. Associated with this, 
that the kinetic energy, that is supposed to be optimal in the Fermi liquid 
normal state, decreases rather than increases in the ordered state. This 
behavior is counterintuitive, since in a normal Fermi liquid description it 
is expected that quasiparticles should become further dressed and less like 
free particles when they develop the correlations leading to the collective 
state, and that they should pay, rather than gain, kinetic energy. Several 
'unconventional' theories have been proposed to explain these phenomena. 
Instead we propose here that in fact quasiparticle undressing is a unifying 
concept that can describe these collective effect in both new and conven- 
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tional materials. The only difference is that only in the newer materials 
is the 'undressing phenomenology' strong enough that it is easily seen in 
experiments. 

2. Dressing and undressing 

The single particle Green's function for an electron in an electronic energy 
band is 

G(k,u) = 1 (1) 

u-e k - T,(k,uj) 

Expanding the self-energy T,(k,uj) around u = 

E(fc,w) = £(fc,0) (2) 

the Green's function can be written as 

G(k,u) = — ^- + G'(k,u) (3) 
to - e k 

where the first term is the quasiparticle part and the second term is the 
incoherent part, and the 'quasiparticle weight' z k is given by 

Zk = [i-dz/duj]- 1 (4) 

If the momentum dependence of the self-energy can be neglected, 

E(jfe,w) ~E(w) (5) 

then we have simply z k = z and e k = ze k which implies that the quasipar- 
ticle weight and effective mass m* are simply related by 

— = z 6 ) 

m* 

hence a highly dressed particle will have a small quasiparticle weight and 
a large effective mass. For the models of interest in this paper the 'local 
approximation' Eq. (5) is reasonable. Finally, the 'kinetic energy' of the 
system is defined by 

E k in = ^n k e k (7) 

k 

where the occupation number n k is obtained from the single particle Green's 
function 

n k = / duf(u)( — ImG(k,u)) (8) 
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with / the Fermi function. The discontinuity of rik at the Fermi surface is 
the quasiparticle weight Z\.. If was to increase for example as the tem- 
perature is lowered, Eq. (7) predicts that the kinetic energy of the system 
would decrease. The existence of this general relation between quasiparticle 
weight increase and kinetic energy lowering was pointed out by Norman et 
al(l). _ 

In the presence of interactions bare particles become dressed with quasi- 
particle weight z and effective mass m* ~ 1/z. The residual weak inter- 
actions between these quasiparticles may cause the system to undergo a 
transition to a collective state. In this paper we discuss a description of 
superconductivity and ferromagnetism that predicts that when the collec- 
tive state develops quasiparticles undress, namely, that z increases and m* 
decreases. The resulting kinetic energy lowering provides the condensation 
energy stabilizing the ordered state. 

3. Low energy effective Hamiltonians 

The low energy effective Hamiltonians in our theory can be derived from 
the single band generalized Hubbard model 

H= - ]T tij^Cj^ + h.c.) + ^IA^)AAc' C l<y'Cha (9) 

<ij>cr ijklaa' 

where (ij\l/r\kl) are matrix elements of the Coulomb interaction involv- 
ing Wannier orbitals at sites i,j,k,l. Keeping only two center integrals, 
we have shown that the off-diagonal interactions (ii\l/r\ij) = (Ai)jj and 
(ij\l/r\ji) = (ii\l/r\jj) = Jij lead to simple descriptions of superconductivity(2) 
and ferromagnetism(3) respectively, that have many features in common 
with the phenomena seen in real materials. It should be pointed out however 
that these off-diagonal interactions are not simply calculable by comput- 
ing matrix elements of the Coulomb interaction between fixed Wannier 
orbitals (4). 

The Hamiltonian that gives rise to (hole) superconductivity is 

H sc = H exHub + ^ (At)ij(ni- a + nj- a )[c\ a c j<T + /i.e.] (10) 

<ij>a 

and the one giving rise to ferromagnetism is 

<ij> & 

The 'extended Hubbard' Hamiltonian H ex n u b includes the kinetic energy 
in Eq. (9) and the ordinary density-density Coulomb interactions U = 
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(ii\l/r\ii), Vij = (ij\l/r\ij). The 'bond charge repulsion' term in Eq. (11) 
describes both exchange and pair hopping processes(3), arising from the 
matrix elements (ij\l/r\ji) and (ii\l/r\jj) respectively. 

These 'off-diagonal' interactions lead to a decrease of the effective mass 
and associated with it a decrease in the kinetic energy as the collective 
states develop. For ferromagnetism, the effective hopping for a carrier of 
spin a is 

%j f = Uj - J* < 4,-oCj,-° + h - c - > (12) 
and it increases when spin polarization develops because the bond charge 
< c\_ a Cj- a > decreases. For superconductivity the effective hopping for 
an electron is 

4 S = U j -n(At) ij (13) 

and it decreases monotonically as the number of electrons in the band 
increases. For holes instead the effective hopping amplitude is 

tf = t^+n h (At) l3 (14a) 

with 

t% = Uj - 2(A% (14b) 

and it increases as the hole concentration increases. Because the local 
hole concentration around a given hole increases when holes pair, the effec- 
tive hopping Eq. (14a) will increase when pairing occurs(6). 

These Hamiltonians describe changes in the quasiparticle effective mass 
when the system enters the collective state, and also as function of doping 
in the normal state. However they do not properly describe the expected 
relation between effective mass and quasiparticle weight discussed in the 
previous section. This is most clearly seen for the effect of At in the normal 
state. According to the model Hamiltonian Eq. (10), the effective mass of a 
single hole in a filled band can be much larger than that of a single electron 
in an empty band, their ratio is 



m hole 



Electron * ~ 2At 



(15) 



On the other hand, the quasiparticle weights for the single electron and the 
single hole in this single band model are simply z e \ = z^oie = 1) hence the 
expected relation between quasiparticle weight and effective mass Eq. (6) 
is strongly violated. 

In addition, the optical conductivity sum rule is violated . The integral 
of the optical conductivity in a tight binding model is given by 



f 

Jo 



du(Ti(u) ~< -T kin > (16) 



hvarpaper.tex; 1/02/2008; 23:31; p. 4 



5 



(proportionality factors are omitted). For the Hamiltonian Eq. (10), the 
average kinetic energy for holes from the ij bond is 

< T kin >ij= -(tj- + n h (At)ij) < c\ c c jtJ > + < T% in > i:j (17a) 

< Ij&„ >ij= ~(A%[< c| 4 >< C^Ci-, > + < cj 4 X C^Cj-, >] 

(17b) 

and it decreases below T c as the anomalous expectation values in Eq. 17(b) 
become nonzero. Hence the integrated optical spectral weight (left side of 
Eq. (16) increases. A similar situation occurs for ferromagnetism. However, 
in a real system the total optical spectral weight is conserved (optical sum 
rule), hence the optical sum rule is 'violated' if kinetic energy lowering 
occurs. The resolution of both this violation and the unphysical relation 
between m* and z arises from consideration of other degrees of freedom 
not contained in the effective Hamiltonian Eq. (9). 

4. Relation between particle and quasiparticle operators 

The low energy effective Hamiltonian Eq. (9) should be understood as de- 
scribing the dynamics of quasiparticles rather than bare particles. For the 
description of superconductivity(5) the quasiparticle operator (which we 
denote by Ci a ) is related to the coherent part of the bare particle operator 
(Ha by 

= [1 - (1 - S)hi- a ]ci a (18a) 

with < S < 1. Here, Cj CT is an electron operator. The corresponding 
relation for hole operators is 

c ia = S[l + Thi- a ]ci a (18b) 

T = 1 - 1 (19) 
In the kinetic energy operator for bare electrons, 

H k in = - tij[4 a c ja + h.c] (20) 

<ij>cr 

upon replacement of the bare electron operator in terms of the quasiparticle 
operators using Eq. (18), a 'correlated hopping' term of the form Eq. (10) 
results. Hence we can identify the correlated hopping amplitude as 

(A% = UjS(l -S) = tJ-T (21) 

The quasiparticle weight for holes in a filled band is Zh = S 2 . When z^ 
is small, holes are heavily dressed in the normal state low hole concen- 
tration regime, and the 'undressing parameter' T is large. When the hole 
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Figure 1. Undressing phenomenology in the cuprates. Both when hole carriers pair 
and when the hole concentration increases by doping, there is an increase in the local 
hole density around a given carrier that gives rise to undressing. This is accompanied by 
spectral weight foansfer from high to low frequencies. 

concentration increases, the quasiparticle weight and the quasiparticle 
bandwidth increase according to the relations 



As a consequence, the system becomes increasingly more coherent as the 
hole concentration increases. 

The relation between bare particle and quasiparticle operator Eq. (18) 
gives rise to hole superconductivity when the parameter T is large, as well 
as to the 'undressing' phenomenology observed in experiments whereby 
quasiparticles undress both when the temperature decreases and the system 
becomes superconducting and when the hole concentration is increased 
in the normal state. This behavior qualitatively shown in Figure 1 was 
predicted(7) based on microscopic considerations for the cuprates well be- 
fore it was observed experimentally. 

For ferromagnetism, a parallel analysis results when in the relation 
between bare and quasiparticle operators Eq. (18a) the site charge ni a is 
replaced by the bond charge. Replacement in the kinetic energy Eq. (20) 
gives rise to exchange and pair hopping terms that give rise to ferromag- 
netism and to undressing (increase in quasiparticle weight and decrease in 
quasiparticle mass) as the system develops spin polarization(8). 




(22a) 




(22b) 
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5. Dynamic Hubbard models 

That the conventional single band Hubbard model is fundamentally flawed 
is seen as follows: in the Hubbard model, destruction of an electron in a 
doubly occupied orbital yields the single electron state, ie 

Ci*\M>=\-<r> (23) 

This relation implies that the doubly occupied state | f|> is a single Slater 
determinant. The very fact that electrons interact makes this an incor- 
rect assumption. Hence the conventional Hubbard model fails to describe 
the most basic aspect of the electronic correlation problem it purports to 
embody, namely correlation of electrons in the same Wannier orbital. 

Recognition of the fact that the doubly occupied orbital j fi> is a 
correlated state rather than a single Slater determinant leads to dynamic 
Hubbard models(9). The correct form of Eq. (23) is 

Cia\U>=\-V> S+J2\- a> ™ S n ( 24 ) 

n>0 

where | — a > n are excited state of the singly occupied orbital, and | — a >= 
| — o > n =o the ground state. Because electrons interact, S in Eq. (24) is 
never unity, and the second term on the right side of Eq. (24) is never zero. 
This leads to the relation between bare particle and quasiparticle operators 
Eq. (18). 

We have discussed various realizations of dynamic Hubbard models, in- 
volving either an auxiliary boson degree of freedom at each site or more than 
one orbital per site(10). A new energy scale enters, given by the excitation 
energies of the states | — a > n . This is the energy range from which the 
high frequency spectral weight gets transfered from. In dynamic Hubbard 
models the Hubbard U becomes a dynamical variable, which can take more 
than one value depending on the relative state of the two electrons in the 
correlated state | ||>, and destruction of an electron in that correlated 
state never yields the singly occupied state \a > with its full amplitude. 
The study of dynamic Hubbard models is only in its beginning stages but it 
is clear already that they exhibit very rich physics absent in the conventional 
Hubbard model. 

6. Conclusions and summary 

We are proposing that there is a single unifying concept behind the two most 
common collective effects in metals, superconductivity and ferromagnetism: 
quasiparticle undressing. Our proposal rests on four pillars, namely: (1) 
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Theoretical consistency, (2) Experimental evidence, (3) Microscopic justifi- 
cation, (4) Philosophical considerations. We summarize arguments in each 
category in the following. 

(1) Theoretical consistency 

The theory is based on the relation beween bare particle and quasipar- 
ticle operators, 

4a = I 1 ~ (! ~ S)niocal]c\a + incoherent part (25) 

with S < 1. For the description of superconductivity and ferromagnetism 
niocal is the site charge or the bond charge respectively (normalized to 
unity). This relation gives rise to low energy effective Hamiltonians with 
off-diagonal interaction terms At and J which drive hole superconductivity 
and ferromagnetism respectively. Inclusion of both the local site and bond 
charge in Eq. (25) will yield a description of both instabilities and their 
competition with the same Hamiltonian. 

As the collective state develops, the term h\ oca i in Eq. (25) decreases: for 
ferromagnetism, spin polarization reduces the bond charge density, and for 
superconductivity hole pairing reduces the electronic site charge density. As 
a consequence the coefficient of cj CT in the first term of Eq. (25) increases, 
and the incoherent part correspondingly decreases. This leads to an increase 
in the quasiparticle weight and a decrease in the quasiparticle mass, as well 
as lowering of kinetic energy. Spectral weight in the optical conductivity is 
transfered to low frequencies from the high frequency processes giving rise 
to the incoherent terms in Eq. (25). This framework then maintains the sim- 
ple relation between quasiparticle weight and quasiparticle mass expected 
on general grounds, as well as explains the optical sum rule violation that 
occurs if only the low energy effective Hamiltonians are considered. These 
low energy effective Hamiltonians are seen to give rise to ferromagnetism 
and superconductivity both within mean field theory as well as in exact 
treatments. 

For superconductivity, the theory predicts that it cannot occur when 
only electron carriers exist at the Fermi energy, because electron carriers 
are already undressed and will not undress further by pairing. It can only 
occur when hole carriers exist at the Fermi energy because holes are dressed. 
When the local hole concentration increases either by pairing or by hole 
doping in the normal state, holes undress and turn into electrons. Pairing 
of holes is especially favored when holes propagate in negatively charged 
structures, since in that case the dressing of the hole is highest and the 
undressing associated with hole pairing is strongest(4, 9). 

(2) Experimental evidence 



hvarpaper.tex; 1/02/2008; 23:31; p. 8 



9 



Certain ferromagnets exhibit clear evidence of undressing in optical 
spectroscopy: manganites(ll), EuBq(12), TlMn20j(13), and some ferro- 
magnetic semiconductors (14). Furthermore the anomalous lowering of re- 
sistivity below T c and the negative magnetoresistance observed in all ferro- 
magnets may be interpreted as originating in lowering of effective mass upon 
spin polarization. The undressing in optical spectroscopy may be too weak 
in certain metallic ferromagnets to be directly observed. The undressing has 
not yet been seen in photoemission experiments in the manganites, but we 
expect that it will be seen in the future. The reduction in the bond charge 
density associated with spin polarization that the theory requires (see the 
previous subsection) manifests itself in the anomalous thermal expansion 
behavior of ferromagnets below T c (15). 

High T c cuprates exhibit abundant experimental evidence that quasipar- 
ticles undress when they pair, in photoemission(16) and optical spectroscopy(17, 
18). Furthermore, optical(19) and photoemission(20) spectroscopy as well 
as transport(21) show that holes undress in the normal state when the 
hole concentration increases by doping. The fact that by pairing dressed 
holes turn into undressed electrons is seen directly in experiments in both 
conventional as well as high T c superconductors(22, 23, 24) . The fact that 
superconductors are frequently prone to lattice instabilities is naturally 
explained by the fact that many antibonding electronic states need to 
be occupied in order for the charge carriers to be hole-like. The observed 
isotope effects and phonon signatures in tunneling are expected to result 
from the fact that ionic displacements will affect the magnitude of the 
interaction At that drives superconductivity. The empirical observation 
that superconductors have hole carriers in the normal state was made by 
Chapnik(25). 

(3) Microscopic justification 

Analysis of the physics of electrons in atomic orbitals shows that the 
basic relation Eq. (18) is valid, with the parameter S decreasing as the net 
ionic charge Z decreases (9). Also, first principles calculation of hopping 
amplitudes in simple diatomic molecules show that indeed the hopping 
amplitude for holes is smaller than the one for electrons in certain param- 
eter ranges(4). The effect becomes large for small interatomic distance and 
small Z, as expected. For ferromagnetism, first principles calculations of 
the relevant quantities have not yet been reported. 

(4) Philosophical considerations 

According to the philosophical principle known as Occam's razor, 'plu- 
ralitas non est ponenda sine necessitas', plurality is not to be assumed 
without necessity. If a single principle can explain a variety of observations it 
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should be preferred over multiple explanations. The principle of undressing 
provides a single explanation for phenomena for which a very large number 
of different explanations have been proposed, hence it should be preferred 
over the other explanations unless clearly proven wrong. 

Another requirement on scientific theories is that they can be falsified by 
experiment. The present theory offers plenty of opportunity for falsification. 
A few examples of possible observations that would disprove the theory 
are: finding of a single superconductor that does not have hole carriers at 
the Fermi energy; observation of transfer of spectral weight in one or two- 
particle spectral functions from low to high frequencies as the collective 
state (superconductor or ferromagnet) develops; finding that in manganites 
the observed effective mass reduction is not accompanied by a substantially 
enhanced quasiparticle peak in photoemission; finding that the gap slope 
in superconductors does not have universal sign(2); etc. 
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1. Implementation 

1 \ProvidesFile{klu9.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9.5, 9/11, 10/12, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcommand\normalsize{°/ 

3 \@setf ontsize\normalsize\@ixpt{ll}°/ 

4 \abovedisplayskip 8.5\p@ \@plus3\p@ \@minus4\p@ 

5 \abovedisplayshortskip \z@ \@plus2\p@ 

6 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\01istl} 
9 \normalsize 

10 \newcommand\small{7« 

11 \@setf ontsize\small\@viiipt{9 . 5}°/, 

12 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus\p@ 

14 \belowdisplayshortskip 3\pQ \@plus\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 3\p@ \@plus\p@ \@minus\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}% 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/ 

22 \@setf ontsize\f ootnotesize\@viipt{8} /o 

23 \abovedisplayskip 4\p@ \@plus2\p@ \@minus2\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 2\p@ \@plus\p@ \@minusl\p@ 

26 \def \@listi{\lef tmargin\lef tmargini 

27 \topsep 2\p@ \@plus\p@ \@minus\p@ 

28 \parsep l\p@ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}°/ 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@vipt\@viipt} 

33 \newcommand\little{\@setf ontsize\little\@vpt\@vipt} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vpt\@vipt} 

35 \newcommand\large{\@setf ontsize\large\@xpt\@xiipt} 

36 \newcommand\Large{\@setf ontsize\Large\@xiipt{14}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xivpt{18}} 

38 \newcommand\huge{\@setf ontsize\huge\@xviipt{22}} 

39 \newcommand\Huge{\@setf ontsize\Huge\@xxpt{25}} 
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1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setlength\hof f set{-lin} 

41 \setlength\vof f set{-lin> 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight-[12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@> 

46 \setlength\f ootskip {25\p@> 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\fboxrule{.4pt> 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
ETgX calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 
Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{7o 

57 \setlength\@tempdima{\paperwidth} /, 

58 \addtolength\@tempdima{-\textwidth}°/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}°/. 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 
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68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}-Q{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight} 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }'/. 



104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6\p@} 

110 \setlength{\skip\f ootins}{9\p@ \@plus 4\pQ \(Sminus 2\p(§} 
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1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength{\lef tmargini}{l . 9em> 

113 \setlength{\lef tmargini i}{2em} 

114 \setlength{\lef tmarginiii}{l . 7em} 

115 \setlength{\lef tmargini v}{1 .4em} 

116 \setlength{\leftmarginvMlem} 
117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsepM .4em> 

119 \setlength-[\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def \@listl{ /, 

122 \leftmargin \lef tmargini 

123 \topsep 8\p@ \@plus2\p@ \@minus2\p@ 

124 \partopsep 2\p@ \@plus l\p@ \@minus l\p@ 

125 \itemsep 4\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4\p® \@plus 2\p@ \@minus l\p@ } 

127 \def \@listii{7, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \<aiistiii{ /, 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \®plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \®listiv{7„ 

143 \setlength{\lef tmargin}{\lef tmarginiv}"/, 

144 \setlength{\labelwidth}{\lef tmarginiv} / 

145 \addtolength{\labelwidth}{-\labelsep}> 

146 \def \<Slistv{7, 

147 \setlength{\lef tmargin}{\lef tmarginv}"/ 

148 \setlength{\labelwidth}{\leftmarginv}°/. 

149 \addtolength{\labelwidth}{-\labelsep}> 

150 \def \@listvi{7, 
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151 \setlength{\lef tmargin}{\lef tmarginvi} / 

152 \set length. {\labelwidth}{\lef tmarginvi} / 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 
155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{10\pQ \@plus 2\p(S \<Sminus 2\p@} 

157 \setlength\textf loatsep{18\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{10\p<3 \@plus 2\p@ \Qminus 2\p(S> 

159 \setlength\dblf loatsep{10\p@ \@plus 2\p@ \<8minus 2\p@> 

160 \setlength\dbltextf loatsep{18\p@ \<§plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p<3 \@plus If il} 

162 \setlength\@fpsep{8\p@ \@plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblf ptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klut9.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcommand\normalsize{°/ 

3 \@setf ontsize\normalsize\@ixpt{10 . 5}°/ 

4 \abovedisplayskip 8.5\p@ \@plus3\p@ \@minus4\p@ 

5 \abovedisplayshortskip \z@ \@plus2\p@ 

6 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\01istl} 
9 \normalsize 

10 \newcommand\small{7« 

11 \@setf ontsize\small\(§viiipt{9} 1 /. 

12 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus\p@ 

14 \belowdisplayshortskip 3\pQ \@plus\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 3\p@ \@plus\p@ \@minus\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}% 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/ 

22 \@setf ontsize\f ootnotesize\@viipt{8} /o 

23 \abovedisplayskip 4\p@ \@plus2\p@ \@minus2\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 2\p@ \@plus\p@ \@minusl\p@ 

26 \def\@listi{\leftmargin\lef tmargini 

27 \topsep 2\p@ \@plus\p@ \@minus\p@ 

28 \parsep l\p@ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}°/ 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@vipt\@viipt} 

33 \newcommand\little{\@setf ontsize\little\@vpt\@vipt} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vpt\@vipt} 

35 \newcommand\large{\@setf ontsize\large\@xpt{ll . 5» 

36 \newcommand\Large{\@setf ontsize\Large\@xiipt{14}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xivpt{18}} 

38 \newcommand\huge{\@setf ontsize\huge\@xviipt{22}-} 

39 \newcommand\Huge{\@setf ontsize\Huge\@xxpt{25}} 
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1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setlength\hof f set{-lin} 

41 \setlength\vof f set{-lin> 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight-[12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@> 

46 \setlength\f ootskip {25\p@> 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\fboxrule{.4pt> 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
ETgX calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 
Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{7o 

57 \setlength\@tempdima{\paperwidth} /, 

58 \addtolength\@tempdima{-\textwidth}°/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}°/. 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 
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68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}-Q{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight} 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }'/. 



104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6\p@} 

110 \setlength{\skip\f ootins}{9\p@ \@plus 4\pQ \(Sminus 2\p(§} 
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1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength{\lef tmargini}{l . 9em> 

113 \setlength{\lef tmargini i}{2em} 

114 \setlength{\lef tmarginiii}{l . 7em} 

115 \setlength{\lef tmargini v}{1 .4em} 

116 \setlength{\leftmarginvMlem} 
117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsepM .4em> 

119 \setlength-[\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def \@listl{ /, 

122 \leftmargin \lef tmargini 

123 \topsep 8\p@ \@plus2\p@ \@minus2\p@ 

124 \partopsep 2\p@ \@plus l\p@ \@minus l\p@ 

125 \itemsep 4\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4\p® \@plus 2\p@ \@minus l\p@ } 

127 \def \@listii{7, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \<aiistiii{ /, 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \®plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \®listiv{7„ 

143 \setlength{\lef tmargin}{\lef tmarginiv}"/, 

144 \setlength{\labelwidth}{\lef tmarginiv} / 

145 \addtolength{\labelwidth}{-\labelsep}> 

146 \def \<Slistv{7, 

147 \setlength{\lef tmargin}{\lef tmarginv}"/ 

148 \setlength{\labelwidth}{\leftmarginv}°/. 

149 \addtolength{\labelwidth}{-\labelsep}> 

150 \def \@listvi{7, 
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151 \setlength{\lef tmargin}{\lef tmarginvi} / 

152 \set length. {\labelwidth}{\lef tmarginvi} / 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 
155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{10\pQ \@plus 2\p(S \<Sminus 2\p@} 

157 \setlength\textf loatsep{18\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{10\p<3 \@plus 2\p@ \Qminus 2\p(S> 

159 \setlength\dblf loatsep{10\p@ \@plus 2\p@ \<8minus 2\p@> 

160 \setlength\dbltextf loatsep{18\p@ \<§plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p<3 \@plus If il} 

162 \setlength\@fpsep{8\p@ \@plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblf ptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klul0.clo}[\filedate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 5/6, 6/7, 7/8, 8/9.5, 9/11, 10/12, 12/14, 14/18, 17/22, 20/25, 
25/30. 



2 \renewcommand\normalsize{°/o 

3 \@setf ontsize\normalsize\@xpt\@xiipt 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \newcommand\small{7„ 

11 \@setf ontsize\small\@ixpt{ll}°/„ 

12 \abovedisplayskip 8.5\p@ \@plus3\p@ \@miims4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def\@listi{\leftmargin\lef tmargini 

16 \topsep 4\p@ \@plus2\p@ \@minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}°/« 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/ 

22 \@setf ontsize\f ootnotesize\@viiipt{9 . 5}°/ 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p@ 

26 \def\@listi{\leftmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}% 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viipt\@viiipt} 

33 \newcommand\little{\@setfontsize\little\@vipt\@viipt} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vpt\@vipt} 

35 \newcommand\large{\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt{18}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25» 
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39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{0pt} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\f boxrule{ . 4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
r^T^X calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 

Presume \text width and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/„ 

57 \setlength\@tempdima{\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}7o 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}y, 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabledMMYou made 
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66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight> 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep> 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 n 



104 \fi 

105 \setlength\topmargin{0pt} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 
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109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{9\p@ \@plus 4\pQ \@minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength-C\lef tmargini}{2em}- 

113 \setlength-C\lef tmarginii}{2 . 2em> 

114 \setlength{\lef tmarginiii}{l . 87em} 

115 \setlength-[\lef tmarginiv}{l . 7em} 

116 \setlength-C\leitmarginvMlem)- 

117 \setlength-[\lef tmarginviMlem} 

118 \setlength{\labelsepM .4em} 

119 \setlength{\labelwidthH\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def\@listl{ /, 

122 \leftmargin \lef tmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p® > 

127 \def \@listii{7, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \®plus 2\p@ \@minus l\p® 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \®listiii{7, 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p® \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \®listiv{7„ 

143 \setlength{\lef tmargin}{\lef tmarginiv} / 

144 \setlength{\labelwidth}{\lef tmarginiv} / 

145 \addtolength{\labelwidth}{-\labelsep}> 

146 \def \aiistv{'/. 



klul0.tex; 1/02/2008; 23:31; p. 5 



6 



147 \setlength{\lef tmargin}{\lef tmarginv}"/ 

148 \set length. {\labelwidth}{\lef tmarginv} 1 / 

149 \addtolength{\labelwidth}{-\labelsep}> 

150 \def \@listvi{7, 

151 \set length. {\lef tmargin}{\lef tmarginvi} / 

152 \setlength{\labelwidthM\lef tmarginvi}"/. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 
155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p@ \(Sminus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p<3 \@plus 2\p@ \Qminus 2\p<§} 

159 \setlength\dblf loatsep{12\p(§ \@plus 2\p@ \@minus 2\p@> 

160 \setlength\dbltextf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il> 

162 \setlength\@fpsep{8\p@ \@plus 2f il> 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblf ptop{0\p<3 \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutl0.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 5/6, 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 12/14, 14/18, 17/22, 20/25, 
25/30. 



2 \renewcommand\normalsize{y o 

3 \@setf ontsize\normalsize\@xpt{ll . 5}°/ 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \newcommand\small{7o 

11 \@setf ontsize\small\(aixpt{10 . 5>% 

12 \abovedisplayskip 8.5\p@ \@plus3\p@ \@minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \@plus2\p@ \@minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}°/« 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/ 

22 \@setf ontsize\f ootnotesize\@viiipt{9}°/ 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p@ 

26 \def\@listi{\leftmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}% 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viipt\@viiipt} 

33 \newcommand\little{\@setf ontsize\little\@vipt\@viipt} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vpt\@vipt} 

35 \newcommand\large{\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt{18}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}} 

38 \newcommand\huge{\@setf ontsize\huge\@xxpt{25}} 
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39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setlength\hof f set{-lin} 
41 \setlength\vof f set{-lin} 
42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@> 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength.\marginparpiish{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 
53 \setlength\f boxsep{3pt} 

54 \setlength\f boxrule{ . 4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
IOTeX calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{7„ 

57 \setlength\@tempdima{\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}7o 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}y, 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabledMMYou made 
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66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight> 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep> 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 n 



104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 
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109 \setlength\footnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{9\p@ \@plus 4\pQ \(Sminus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength{\leftmarginiM2em} 

113 \setlength{\lef tmarginii}{2 . 2em> 

114 \setlength{\lef tmarginiii}{l . 87em} 

115 \setlength.{\leftmarginiv}{l . 7em} 
116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginviMlem} 

118 \setlength{\labelsepM .4em} 

119 \setlength{\labelwidthH\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def \01istI{°/„ 

122 \leftmargin \leftmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \it emsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p@ } 

127 \def \@listii{°/„ 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

132 \parsep 2\p@ \@plus l\p@ \(§minus l\p@ 

133 \itemsep \parsep} 

134 \def \Qlistiii{°/„ 

135 \lef tmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \Qlistiv{°/„ 

143 \setlength{\lef tmargin}{\lef tmarginiv} / 

144 \setlength{\labelwidth}{\lef tmarginiv} / 

145 \addtolength{\labelwidth}{-\labelsep}> 

146 \def \@listv{°/„ 
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147 \set length. {\lef tmargin}{\lef tmarginv}°/ 

148 \setlength{\labelwidth}{\lef tmarginv} 1 / 

149 \addtolength{\labelwidth}{-\labelsep}> 

150 \def \@listvi{7, 

151 \setlength{\lef tmargin}{\lef tmarginvi} / 

152 \setlength{\labelwidthM\lef tmarginvi}"/. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 
155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p@ \(Sminus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \Qminus 2\p(§} 

159 \setlength\dblf loatsep{12\p(§ \@plus 2\p@ \@minus 2\p@> 

160 \setlength\dbltextf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il> 

162 \setlength\@fpsep{8\p@ \@plus 2f il> 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblf ptop{0\p<3 \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutll.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/12.5, 12/14, 14/18, 17/22, 
20/25, 25/30. 



2 \renewcommand\normalsize{°/o 

3 \@setf ontsize\normalsize\@xipt{12 . 5}% 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\<§listi\@listi} 
9 \normalsize 

10 \newcommand\small{7„ 

11 \@setf ontsize\small\@xpt{ll . 5}°/„ 

12 \abovedisplayskip 9\p@ \@plus3\p@ \0minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\pQ 

14 \belowdisplayshortskip 5\p@ \0plus2\p@ \(§minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \0plus2\p0 \@minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}°/ 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/ 

22 \@setf ontsize\f ootnotesize\@ixpt{10 . 5}7, 

23 \abovedisplayskip 6\p@ \0plus2\p@ \0minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p(§ 

26 \def\@listi{\leftmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \<§minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}% 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viiipt{9 . 5}} 

33 \newcommand\little{\@setf ontsize\little\@viipt\@viiipt} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vipt\@viipt} 

35 \newcommand\large{\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt{18}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}} 

38 \newcommand\huge{\@setf ontsize\huge\(§xxpt{25» 



klutll.tex; 1/02/2008; 23:31; p. 2 



3 



39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setlength\hof f set{-lin} 
41 \setlength\vof f set{-lin} 
42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 
53 \setlength\f boxsep{3pt} 

54 \setlength\f boxrule{ . 4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
r^T^X calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 

Presume \text width and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/„ 

57 \setlength\@tempdima{\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}7o 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}y, 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabledMMYou made 
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66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight> 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep> 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 n 



104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 
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109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{9\p@ \@plus 4\pQ \@minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength-C\lef tmargini}{2em}- 

113 \setlength-C\lef tmarginii}{2 . 2em> 

114 \setlength{\lef tmarginiii}{l . 87em} 

115 \setlength-[\lef tmarginiv}{l . 7em} 

116 \setlength-C\leitmarginvMlem)- 

117 \setlength-[\lef tmarginviMlem} 

118 \setlength{\labelsepM .4em} 

119 \setlength{\labelwidthH\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def\@listl{ /, 

122 \leftmargin \lef tmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p® > 

127 \def \@listii{7, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \®plus 2\p@ \@minus l\p® 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \®listiii{7, 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p® \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \®listiv{7„ 

143 \setlength{\lef tmargin}{\lef tmarginiv} / 

144 \setlength{\labelwidth}{\lef tmarginiv} / 

145 \addtolength{\labelwidth}{-\labelsep}> 

146 \def \aiistv{'/. 
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147 \setlength{\lef tmargin}{\lef tmarginv}"/ 

148 \set length. {\labelwidth}{\lef tmarginv} 1 / 

149 \addtolength{\labelwidth}{-\labelsep}> 

150 \def \@listvi{7, 

151 \set length. {\lef tmargin}{\lef tmarginvi} / 

152 \setlength{\labelwidthM\lef tmarginvi}"/. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 
155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p@ \(Sminus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p<3 \@plus 2\p@ \Qminus 2\p<§} 

159 \setlength\dblf loatsep{12\p(§ \@plus 2\p@ \@minus 2\p@> 

160 \setlength\dbltextf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il> 

162 \setlength\@fpsep{8\p@ \@plus 2f il> 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblf ptop{0\p<3 \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutl2.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type provided 
values: 6/7, 8/9, 9/10.5, 10/11.5, 11/12.5 12/13.5, 14/18, 17/22, 20/25, 25/30. 



2 \renewcommand\normalsize{7, 

3 \@setf ontsize\normalsize\@xiipt{13 . 5}7o 

4 \abovedisplayskip ll\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip l\p@ \@plus 3\p@ 

6 \belowdisplayshortskip 7\p@ \@plus 3\p@ \@mimis3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \newcommand\small{7 

11 \@setf ontsize\small\0xipt{12 . 5}7. 

12 \abovedisplayskip 8.5\p@ \0plus3\p@ \@minus4\p@ 

13 \abovedisplayshortskip \z@ \(§plus2\p(§ 

14 \belowdisplayshortskip 4\p@ \0plus2\p@ \0minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \0plus2\p@ \0minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}7. 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{7« 

22 \@setf ontsize\f ootnotesize\@xpt{ll . 5}7» 

23 \abovedisplayskip 6\p@ \@plus2\p@ \0minus4\p0 

24 \abovedisplayshortskip \z@ \(§plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p@ 

26 \def\@listi{\leftmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p@ \(§minus\p@ 

29 \itemsep \parsep}7. 

30 \belowdisplayskip \abovedisplayskip 



31 > 

32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@ixpt{10 . 5}} 

33 \newcommand\little{\@setf ontsize\little\@viiipt{9}} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vipt\@viipt} 

35 \newcommand\large{\@setf ontsize\large\@xivpt{18}} 

36 \newcommand\Large{\@setf ontsize\Large\@xviipt{22}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xxpt{25}} 

38 \newcommand\liuge{\@setf ontsize\huge\@xxvpt{30}} 

39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}> 
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1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the calculations 
below easier. 

40 \setlength\hoff set{-lin> 

41 \setlength\vof f set{-lin> 

42 \setlength\parindent {14\p@} 

43 \setlengt]i\headheight-[12\p@} 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@> 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{12pt} 

52 \setlength\columnseprule{Opt} 

53 \setlength\f boxsep{3pt} 

54 \setlength\fboxrule{ .4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, ET^X 
calculates textwidth out of \paperwidth. We did want to support letter paper, but our 
\textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in trouble. The 
2pc value is used to compensate for the 'dead' corners in most laser printers. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and later 
on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{7o 

57 \setlength\@tempdima-[\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}°/o 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}7„ 

63 \ifdim \@tempdima <\@tempdimb 



64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabledMMYou made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 
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70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 YL 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \f i 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 YL 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 

These calculations are a lot easier, \textheight should have been set already. This does 

not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight} 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 

99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 YL 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{12\p@ \@plus 4\p(S \<Sminus 2\p@> 
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1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength{\lef tmargini}{2em} 

113 \setlength{\lef tmarginii}{2 . 2em} 

114 \setlength{\lef tmarginiii}{l . 87em} 

115 \setlength{\lef tmarginiv}{l . 7em} 

116 \setlength{\lef tmarginv}{lem> 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsepM.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidthH-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This results 
in very small labels for the inner lists. 

121 \def \<§listI{°/„ 

122 \leftmargin \lef tmargini 

123 \topsep ll\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 4.5\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 6\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 6\p@ \@plus 2\p@ \@minus l\p@ } 

127 \def \Qlistii{% 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 6\p@ \@plus 2\p@ \@minus l\pQ 

132 \parsep 3\p@ \@plus l\p@ \@minus l\pQ 

133 \itemsep \parsep} 

134 \def \@listiii{% 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \(Slistiv{% 

143 \setlength{\lef tmargin}{\lef tmarginiv}"/, 

144 \setlength{\labelwidth}{\lef tmarginiv}7 

145 \addtolength{\labelwidthM-\labelsep}} 

146 \def \@listv{°/ 

147 \setlength{\lef tmargin}{\lef tmarginv}°/ 

148 \setlength{\labelwidth>{\leftmarginv}7o 

149 \addtolength{\labelwidthM-\labelsep}} 

150 \def \(§listvi{7„ 
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151 \set length. {\lef tmargin}{\lef tmarginvi}7 

152 \setlength{\labelwidth}{\lef tmarginvi}°/ 

153 \addtolength{\labelwidthM-\labelsep}} 
154 \let\@listi\@listl 

155 \@listi 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p(S \@plus 2\p(S \@minus 2\p@} 

157 \setlength\textf loatsep{24\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p(S \@plus 2\p@ \(Sminus 2\p<3} 

159 \setlength\dblf loatsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

160 \setlength\dbltextf loatsep{24\p@ \(§plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il} 

162 \setlength\@fpsep{10\p@ \@plus 2f il} 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblfptop{0\p@ \@plus If il} 

165 \setlength\<§dblfpsep{10\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klul05.clo}[\f iledate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 6/7, 7/8, 9/11, 10/11.5, 10.5/12, 11/13, 12/14, 14/18, 17/22, 
20/25, 25/30. 



2 \renewcommand\normalsize{°/o 

3 \@setf ontsize\normalsize{10 . 5pt}{12}% 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p@ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplayshortskip 6\p@ \@plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \newcommand\small{7„ 

11 \@setf ontsize\small\(§xpt{ll . 5}°/„ 

12 \abovedisplayskip 9\p@ \0plus3\p@ \@minus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\pQ 

14 \belowdisplayshortskip 5\p@ \0plus2\p@ \(§minus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p@ \@plus2\p@ \0minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}°/ 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/ 

22 \@setf ontsize\f ootnotesize\@ixpt\@xipt 

23 \abovedisplayskip 6\p@ \0plus2\p@ \0minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \@minus2\p(§ 

26 \def \@listi{\lef tmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \<§minus\p@ 

28 \parsep 2\pQ \@plus\p@ \@minus\p@ 

29 \itemsep \parsep}% 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viiipt{9 . 5}} 

33 \newcommand\little{\@setf ontsize\little\@viipt\@viiipt} 

34 \newcommand\tiny{\@setf ontsize\tiny\@vipt\@viipt} 

35 \newcommand\large{\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\@xivpt{18}} 

37 \newcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22}> 

38 \newcommand\huge{\@setf ontsize\huge\(§xxpt{25» 
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39 \newcommand\Huge{\@setf ontsize\Huge\@xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setlength\hof f set{-lin} 
41 \setlength\vof f set{-lin} 
42 \setlength\parindent {14\p@} 

43 \setlength\headheight{12\p@} 

44 \setlength\headsep {13\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt} 
53 \setlength\f boxsep{3pt} 

54 \setlength\f boxrule{ . 4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
r^T^X calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 

Presume \text width and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{°/„ 

57 \setlength\@tempdima{\paperwidth}°/ 

58 \addtolength\@tempdima{-\textwidth}7o 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\@tempdimb{2pc}y, 

63 \ifdim \@tempdima <\@tempdimb 

64 \@settopoint\@tempdimb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabledMMYou made 
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66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }'/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advance\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }'/. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \setlength\@tempdima{\paperheight> 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep> 

93 \setlength\@tempdimb{\@tempdima} 

94 \addtolength\@tempdima{-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\@tempdimb by -4pc 

98 \@settopoint\@tempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes givenMMYou 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 n 



104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id@boxheight{\@tempdima} 

107 \advance\id@boxheight by -2pc 

108 } 
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109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{9\p@ \@plus 4\pQ \@minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \@minus l\p@} 

112 \setlength-C\lef tmargini}{2em}- 

113 \setlength-C\lef tmarginii}{2 . 2em> 

114 \setlength{\lef tmarginiii}{l . 87em} 

115 \setlength-[\lef tmarginiv}{l . 7em} 

116 \setlength-C\leitmarginvMlem)- 

117 \setlength-[\lef tmarginviMlem} 

118 \setlength{\labelsepM .4em} 

119 \setlength{\labelwidthH\lef tmargini} 

120 \addtolength{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def\@listl{ /, 

122 \leftmargin \lef tmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p@ \@plus 2\p@ \@minus l\p® > 

127 \def \@listii{7, 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \®plus 2\p@ \@minus l\p® 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \®listiii{7, 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p® \@plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p@ \@minus l\p@ 

141 \itemsep \topsep} 

142 \def \®listiv{7„ 

143 \setlength{\lef tmargin}{\lef tmarginiv} / 

144 \setlength{\labelwidth}{\lef tmarginiv} / 

145 \addtolength{\labelwidth}{-\labelsep}> 

146 \def \aiistv{'/. 
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147 \setlength{\lef tmargin}{\lef tmarginv}"/ 

148 \set length. {\labelwidth}{\lef tmarginv} 1 / 

149 \addtolength{\labelwidth}{-\labelsep}> 

150 \def \@listvi{7, 

151 \set length. {\lef tmargin}{\lef tmarginvi} / 

152 \setlength{\labelwidthM\lef tmarginvi}"/. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 
155 \01isti 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p@ \(Sminus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep{12\p<3 \@plus 2\p@ \Qminus 2\p<§} 

159 \setlength\dblf loatsep{12\p(§ \@plus 2\p@ \@minus 2\p@> 

160 \setlength\dbltextf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \@plus If il> 

162 \setlength\@fpsep{8\p@ \@plus 2f il> 

163 \setlength\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblf ptop{0\p<3 \@plus If il} 

165 \setlength\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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